(rmail): Allow nonexistent file as arg.

diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 3e9ed328d515b2c86800bb8135dd58e4ac77fab3..91ad7d783ffb649f7c785d503e55b290b864180f 100644 (file)
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -282,8 +282,7 @@ have a chance to specify a file name with the minibuffer.
 
 If `rmail-display-summary' is non-nil, make a summary for this RMAIL file."
   (interactive (if current-prefix-arg
-                  (list (read-file-name "Run rmail on RMAIL file: "
-                                        nil nil t))))
+                  (list (read-file-name "Run rmail on RMAIL file: "))))
   (let* ((file-name (expand-file-name (or file-name-arg rmail-file-name)))
         (existed (get-file-buffer file-name)))
     ;; Like find-file, but in the case where a buffer existed